(Buffer-menu-mouse-select): Handle dedicated window.

diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el
index 3c55bdb4d3cd9a2b823886d746f9057d12b4ed25..a2f67bf59f359db688a49fff908a66a45d31ec85 100644 (file)
--- a/lisp/buff-menu.el
+++ b/lisp/buff-menu.el
@@ -346,7 +346,10 @@ You can mark buffers with the \\<Buffer-menu-mode-map>\\[Buffer-menu-mark] comma
        (goto-char (posn-point (event-end event)))
        (setq buffer (Buffer-menu-buffer t))))
     (select-window (posn-window (event-end event)))
-    (switch-to-buffer buffer)))
+    (if (and (window-dedicated-p (selected-window))
+            (eq (selected-window) (frame-root-window)))
+       (switch-to-buffer-other-frame buffer)
+      (switch-to-buffer buffer))))
 
 (defun Buffer-menu-this-window ()
   "Select this line's buffer in this window."